Profile of (eval 76)[Eval/TypeTiny.pm:8]

Filename	(eval 76)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Eval/TypeTiny.pm:8]
Statements	Executed 4 statements in 120µs
Eval Invoked At	/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Eval/TypeTiny.pm line 8
Sibling evals	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	7µs	22µs	Eval::TypeTiny::Sandbox::::BEGIN@3.35Eval::TypeTiny::Sandbox::BEGIN@3.35
1	1	1	2µs	2µs	Eval::TypeTiny::Sandbox::::__ANON__[:9]Eval::TypeTiny::Sandbox::__ANON__[:9]
0	0	0	0s	0s	Eval::TypeTiny::Sandbox::::__ANON__[:8]Eval::TypeTiny::Sandbox::__ANON__[:8]
0	0	0	0s	0s	Types::Standard::::assert_StrictNum Types::Standard::assert_StrictNum

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					package Eval::TypeTiny::Sandbox;
2					# spent 2µs within Eval::TypeTiny::Sandbox::__ANON__[(eval 76)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Eval/TypeTiny.pm:8]:9] which was called: # once (2µs+0s) by Eval::TypeTiny::eval_closure at line 248 of Eval/TypeTiny.pm sub {
3	2	114µs	2	37µs	# spent 22µs (7+15) within Eval::TypeTiny::Sandbox::BEGIN@3.35 which was called: # once (7µs+15µs) by Eval::TypeTiny::_clean_eval at line 3 sub { no warnings "void"; package Type::Tiny; (do { package Type::Tiny; my $val = $_[0];(defined($val) and not ref($val)) && ( $val =~ /\A[+-]?[0-9]+\z/ \|\| $val =~ /\A(?:[+-]?) # matches optional +- in the beginning # spent 22µs making 1 call to Eval::TypeTiny::Sandbox::BEGIN@3.35 # spent 15µs making 1 call to warnings::unimport
4					(?=[0-9]\|\.[0-9]) # matches previous +- only if there is something like 3 or .3
5					[0-9]* # matches 0-9 zero or more times
6					(?:\.[0-9]+)? # matches optional .89 or nothing
7					(?:[Ee](?:[+-]?[0-9]+))? # matches E1 or e1 or e-1 or e+1 etc
8					\z/x ); }) or Type::Tiny::_failed_check(11, "StrictNum", $_[0], ); $_[0] }
9	2	6µs			}
10					;